home *** CD-ROM | disk | FTP | other *** search
- BACKGROUND 31
- SHADOW ON
- BEEP ON
-
- CALL KS_TITLE
- PAUSE 50
- CALL PROG_TITLE
- PAUSE 50
- TELESCOPE OFF
-
- SPACE 1500
- :GET_TARGET
- DRIVE C 10 19 113 31 5 12 95 'wx,wy,wc,ic,mx,my,mc
- PATH \USGEO 10 19 113 31 5 12 95
- EXIST ~1~2\*.*
- JUMP.NO CHK1
-
- WINOPEN 0 20 113
- "The directory ~1~2 already exists! Are"
- "you sure you want to use this directory? Y/N"
- ASK +47 +2
- WINCLOSE
- JUMP.NO GET_TARGET
-
- :CHK1
- EXIST ~0\usgeo22.001
- JUMP.YES COPY_FILE1
- DISK 0 usgeo22.001 10 20 47
-
- :COPY_FILE1
- COPY ~0\usgeo22.001 ~1~2 10 20 113
- JUMP.FAIL INST_FAIL
-
- EXIST ~0\usgeo22.002
- JUMP.YES COPY_FILE2
- DISK 0 usgeo22.002 10 20 47
-
- :COPY_FILE2
- COPY ~0\usgeo22.002 ~1~2 10 20 113
- JUMP.FAIL INST_FAIL
-
- EXIST ~1~2\usgeo.exe
- JUMP.YES OVRWRITE
-
- :COPYFILES
- SHELL
- "~1"
- "cd ~2"
- "copy /b usgeo22.001+usgeo22.002 usgeo22.exe >NUL"
- "del usgeo22.001"
- "del usgeo22.002"
- "usgeo22"
- "del usgeo22.exe"
-
- WINOPEN 0 20 113
- "Would you like to view the instructions"
- "for U.S. Geography? Y/N"
- ASK +29 +2
- WINCLOSE
- JUMP.NO PRINT_DOC
- VIEW ~1~2\usgeo.doc 27 112
-
- :PRINT_DOC
- WINOPEN 0 20 113
- "Would you like to print the instructions"
- "for U.S. Geography? Y/N"
- ASK +29 +2
- WINCLOSE
- JUMP.NO INST_OK
-
- :PRINT_NOW
- WINOPEN 0 20 116
- ""
- " Printing... "
- ""
- PRINT ~1~2\usgeo.doc
- WINCLOSE
- JUMP.FAIL PRN_ERR
- JUMP INST_OK
-
- :PRN_ERR
- WINOPEN 0 12 112
- "Your printer is not responding. Possible problems:"
- ""
- " ■ Printer is not attached to LPT1"
- " ■ Printer is not turned on"
- " ■ Printer is out of paper"
- ""
- "Do you want to try to print again? Y/N"
- ASK +42 +7
- WINCLOSE
- JUMP.YES PRINT_NOW
-
- :INST_OK
- TELESCOPE ON
- WINOPEN 5 9 113
- " Installation was successful. Use the following commands "
- " to run USGEO:"
- " ~1"
- " CD ~2"
- " USGEO"
- ""
- " If you experience a conflict with your sound card, pass"
- " the address and interrupt number used by your sound"
- " card on the command line, as in: USGEO 220 5 See the"
- " USGEO.DOC file for more details."
- ""
- " Would you like to run USGEO now? Y/N "
- ASK +49 +20
- WINCLOSE
- JUMP.NO THE_END
- RUN usgeo.exe
-
- :THE_END
- WINCLOSE 'close title win1
- WINCLOSE 'close title win2
- END 'normal install
-
- :KS_TITLE
- BORDER 0
- WINOPEN 2 2 53
- " "
- " "
- " "
- " "
- " "
- " "
- " "
- " "
- " "
- " "
- WINUPDATE +10 +3 58
- "K"
- WINUPDATE +11 +3 59
- "i"
- WINUPDATE +12 +3 60
- "d"
- WINUPDATE +13 +3 61
- "S"
- WINUPDATE +14 +3 62
- "t"
- WINUPDATE +15 +3 63
- "u"
- WINUPDATE +16 +3 49
- "f"
- WINUPDATE +17 +3 53
- "f"
- WINUPDATE +19 +3 58
- "S"
- WINUPDATE +20 +3 59
- "o"
- WINUPDATE +21 +3 60
- "f"
- WINUPDATE +22 +3 61
- "t"
- WINUPDATE +23 +3 62
- "w"
- WINUPDATE +24 +3 63
- "a"
- WINUPDATE +25 +3 49
- "r"
- WINUPDATE +26 +3 53
- "e"
- WINUPDATE +11 +5 48
- "6490 Dubois Rd."
- WINUPDATE +7 +6 48
- "Lewis Center, OH 43035"
- WINUPDATE +4 +7 48
- "614-548-5043 CIS 71043,3706"
- WINUPDATE +5 +9 59
- "Educational Software 4 Kids"
- BORDER 1
- RETURN
-
- :PROG_TITLE
- WINOPEN 42 5 95
- " "
- ""
- ""
- "Register USGEO for $15.00 and"
- "receive the sound files for all"
- "50 state names and capitals, as"
- "well as removal of the shareware"
- "screens and discounts on other"
- "KidStuff programs!"
- WINUPDATE +6 +2 91
- "U.S. Geography v2.2sw"
- RETURN
-
- :OVRWRITE
- WINOPEN 5 18 47
- "A previous version of this program was "
- "detected. Please enter Y in response to"
- "any overwrite messages you may see on"
- "the next screen. Press [Enter]"
- WAIT +41 +4
- WINCLOSE
- JUMP COPYFILES
-
- :INST_FAIL
- WINOPEN 0 13 112
- "THE INSTALLATION PROGRAM FAILED PRIOR TO COMPLETION"
- "Possible reasons:"
- ""
- " ■ The floppy disk was removed prior to completion."
- " ■ The floppy disk was damaged during shipping."
- " ■ Your disk drive is out of alignment."
- ""
- "Please contact KidStuff Software. Press [Enter]"
- WAIT +54 +8
- DELETE ~1~2\*.* 0 0 31
- RD ~1~2
- WINCLOSE
-